﻿Public Class CAdder
    Function vbAdd(ByVal a As Long, ByVal b As Long) As Long
        Return a + b
    End Function

End Class


